
Partial Class WebForm_ManageBulletin
    Inherits My.MyPage

    Protected Sub SearchBulletin1_Loaded(ByVal sender As Object, ByVal e As System.EventArgs) Handles SearchBulletin1.Loaded
        'Me.SearchRegion1.BindGV()
    End Sub

    Protected Sub lknAdd_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles lknAdd.Click
        Me.InitDataForAdd()
    End Sub

    Protected Sub SearchBulletin1_Updating(ByVal sender As Object, ByVal e As System.EventArgs) Handles SearchBulletin1.Updating
        Me.InitDataForUpdate()
    End Sub

    Protected Sub SearchBulletin1_Adding(ByVal sender As Object, ByVal e As System.EventArgs) Handles SearchBulletin1.Adding
        Me.InitDataForAdd()
    End Sub

    Protected Sub SearchBulletin1_Saving(ByVal sender As Object, ByVal e As System.EventArgs) Handles AddBulletin1.Saved
        Me.InitDataForSearch()
    End Sub

    Protected Sub lknAddService_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles lknAddService.Click
        Me.TabContainer1.ActiveTab = Me.AddServiceTabPanel
        Me.AddServiceBulletin1.InitData()
    End Sub
    Protected Sub SearchServiceBulletin1_Updating(ByVal sender As Object, ByVal e As System.EventArgs) Handles SearchServiceBulletin1.Updating
        Me.TabContainer1.ActiveTab = Me.AddServiceTabPanel
        Me.AddServiceBulletin1.InitData(Me.SearchServiceBulletin1.ServiceID)
    End Sub
    Protected Sub SearchServiceBulletin1_Adding(ByVal sender As Object, ByVal e As System.EventArgs) Handles SearchServiceBulletin1.Adding
        Me.TabContainer1.ActiveTab = Me.AddServiceTabPanel
        Me.AddServiceBulletin1.InitData()
    End Sub
    Protected Sub SearchServiceBulletin1_Saving(ByVal sender As Object, ByVal e As System.EventArgs) Handles AddServiceBulletin1.Saved
        Me.TabContainer1.ActiveTab = Me.SearchServiceTabPanel
        Me.SearchServiceBulletin1.BindGV()
    End Sub
End Class

Partial Class WebForm_ManageBulletin
    Private Sub InitDataForAdd()
        Me.TabContainer1.ActiveTab = Me.AddTabPanel
        Me.AddBulletin1.InitData()
    End Sub

    Private Sub InitDataForAdd(ByVal parent As String)
        Me.TabContainer1.ActiveTab = Me.AddTabPanel        
        Me.AddBulletin1.InitData()
    End Sub

    Private Sub InitDataForUpdate()
        Me.TabContainer1.ActiveTab = Me.AddTabPanel
        Me.AddBulletin1.InitData(Me.SearchBulletin1.SelectedBulletinID)
    End Sub

    Private Sub InitDataForSearch()
        Me.TabContainer1.ActiveTab = Me.SearchTabPanel
        Me.SearchBulletin1.BindGV(Me.AddBulletin1.BulletinSubject)
    End Sub

End Class
